home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 1 / Gigarom Macintosh Archives (Quantum Leap)(CDRM1080320)(1993).iso / FILES / HYP / C-D / DeveloperStax.cpt / Developer Stack 1.2r / background_14090.txt < prev    next >
Text File  |  1989-02-26  |  5KB  |  234 lines
  1. -- background: 14090 from stack: in.2r
  2. -- bmap block id: 12403
  3. -- flags: 4000
  4. -- background id: 0
  5. -- name: Buttons
  6. ----- HyperTalk script -----
  7. on opencard
  8.   put (the number of this card - the number of first card of this background+1) into field "PageNumber"
  9. end opencard
  10.  
  11.  
  12.  
  13. -- part 1 (button)
  14. -- low flags: 00
  15. -- high flags: 2000
  16. -- rect: left=456 top=301 right=329 bottom=493
  17. -- title width / last selected line: 0
  18. -- icon id / first selected line: 11645 / 11645
  19. -- text alignment: 1
  20. -- font id: 0
  21. -- text size: 12
  22. -- style flags: 0
  23. -- line height: 16
  24. -- part name: Return
  25. ----- HyperTalk script -----
  26. on mouseUp
  27.   if the optionkey is down then pass mouseup
  28.   visual effect iris close
  29.   go first card
  30. end mouseUp
  31.  
  32.  
  33.  
  34. -- part 3 (button)
  35. -- low flags: 00
  36. -- high flags: 2000
  37. -- rect: left=228 top=306 right=331 bottom=255
  38. -- title width / last selected line: 0
  39. -- icon id / first selected line: 1014 / 1014
  40. -- text alignment: 1
  41. -- font id: 0
  42. -- text size: 12
  43. -- style flags: 0
  44. -- line height: 16
  45. -- part name: Prev
  46. ----- HyperTalk script -----
  47. on mouseUp
  48.   if the optionkey is down then pass mouseup
  49.   visual effect wipe right
  50.   go to previous card
  51. end mouseUp
  52.  
  53.  
  54.  
  55. -- part 4 (button)
  56. -- low flags: 00
  57. -- high flags: 2000
  58. -- rect: left=280 top=306 right=331 bottom=307
  59. -- title width / last selected line: 0
  60. -- icon id / first selected line: 1013 / 1013
  61. -- text alignment: 1
  62. -- font id: 0
  63. -- text size: 12
  64. -- style flags: 0
  65. -- line height: 16
  66. -- part name: Next
  67. ----- HyperTalk script -----
  68. on mouseUp
  69.   if the optionkey is down then pass mouseup
  70.   visual effect wipe left
  71.   go to next card
  72. end mouseUp
  73.  
  74.  
  75.  
  76. -- part 5 (field)
  77. -- low flags: 01
  78. -- high flags: 0000
  79. -- rect: left=255 top=311 right=327 bottom=282
  80. -- title width / last selected line: 0
  81. -- icon id / first selected line: 0 / 0
  82. -- text alignment: 1
  83. -- font id: 3
  84. -- text size: 12
  85. -- style flags: 0
  86. -- line height: 16
  87. -- part name: PageNumber
  88.  
  89.  
  90. -- part 6 (button)
  91. -- low flags: 00
  92. -- high flags: 2004
  93. -- rect: left=2 top=74 right=117 bottom=49
  94. -- title width / last selected line: 0
  95. -- icon id / first selected line: 14767 / 14767
  96. -- text alignment: 1
  97. -- font id: 0
  98. -- text size: 12
  99. -- style flags: 0
  100. -- line height: 16
  101. -- part name: About...
  102. ----- HyperTalk script -----
  103. on mouseUp
  104.   if the optionkey is down then pass mouseup
  105.   visual iris open to gray
  106.   visual iris close to black
  107.   visual iris open to gray
  108.   visual iris close
  109.   go background information
  110. end mouseUp
  111.  
  112.  
  113.  
  114. -- part 7 (button)
  115. -- low flags: 00
  116. -- high flags: 2004
  117. -- rect: left=2 top=119 right=162 bottom=49
  118. -- title width / last selected line: 0
  119. -- icon id / first selected line: 29114 / 29114
  120. -- text alignment: 1
  121. -- font id: 0
  122. -- text size: 12
  123. -- style flags: 0
  124. -- line height: 16
  125. -- part name: Back
  126. ----- HyperTalk script -----
  127. on mouseUp
  128.   if the optionkey is down then pass mouseup
  129.   visual barn door close to black
  130.   visual barn door open
  131.   pop card
  132. end mouseUp
  133.  
  134.  
  135.  
  136. -- part 8 (button)
  137. -- low flags: 00
  138. -- high flags: 2004
  139. -- rect: left=2 top=164 right=207 bottom=49
  140. -- title width / last selected line: 0
  141. -- icon id / first selected line: 1011 / 1011
  142. -- text alignment: 1
  143. -- font id: 0
  144. -- text size: 12
  145. -- style flags: 0
  146. -- line height: 16
  147. -- part name: Home
  148. ----- HyperTalk script -----
  149. on mouseUp
  150.   if the optionkey is down then pass mouseup
  151.   go home
  152. end mouseUp
  153.  
  154.  
  155.  
  156. -- part 9 (button)
  157. -- low flags: 00
  158. -- high flags: 2004
  159. -- rect: left=2 top=209 right=252 bottom=49
  160. -- title width / last selected line: 0
  161. -- icon id / first selected line: 1000 / 1000
  162. -- text alignment: 1
  163. -- font id: 0
  164. -- text size: 12
  165. -- style flags: 0
  166. -- line height: 16
  167. -- part name: Open Stack
  168. ----- HyperTalk script -----
  169. on mouseUp
  170.   if the optionkey is down then pass mouseup
  171.   domenu "open stack..."
  172. end mouseUp
  173.  
  174.  
  175.  
  176. -- part 10 (button)
  177. -- low flags: 00
  178. -- high flags: 2004
  179. -- rect: left=2 top=254 right=297 bottom=49
  180. -- title width / last selected line: 0
  181. -- icon id / first selected line: 17343 / 17343
  182. -- text alignment: 1
  183. -- font id: 0
  184. -- text size: 12
  185. -- style flags: 0
  186. -- line height: 16
  187. -- part name: Launch Application
  188. ----- HyperTalk script -----
  189. on mouseUp
  190.   if the optionkey is down then pass mouseup
  191.   visual venetian blinds to gray
  192.   visual venetian blinds to black
  193.   visual venetian blinds to gray
  194.   visual venetian blinds
  195.  
  196.   go to background "Mini Hyperstation"
  197. end mouseUp
  198.  
  199.  
  200.  
  201. -- part 11 (button)
  202. -- low flags: 00
  203. -- high flags: 2004
  204. -- rect: left=2 top=299 right=342 bottom=49
  205. -- title width / last selected line: 0
  206. -- icon id / first selected line: 21786 / 21786
  207. -- text alignment: 1
  208. -- font id: 0
  209. -- text size: 12
  210. -- style flags: 0
  211. -- line height: 16
  212. -- part name: Menus On
  213. ----- HyperTalk script -----
  214. on mouseUp
  215.   if the optionkey is down then pass mouseup
  216.  
  217.   if menubar("¬©1988SDrazga") then hide menubar else show menubar
  218. end mouseUp
  219.  
  220.  
  221.  
  222. -- part 12 (field)
  223. -- low flags: 01
  224. -- high flags: 0000
  225. -- rect: left=108 top=31 right=65 bottom=336
  226. -- title width / last selected line: 0
  227. -- icon id / first selected line: 0 / 0
  228. -- text alignment: 0
  229. -- font id: 3
  230. -- text size: 24
  231. -- style flags: 0
  232. -- line height: 32
  233. -- part name: Name
  234.